Top 10k strings from Mathskills I (1984)(Griffin Software)(Side A).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
6 ;" "
4 lframe=8065
3 *"m";d;p$:
2 z1=z1+(z-1
2 yc,xc+z;" ":
2 usr
2 qy=(q$="y"
2 qn=(q$="n"
2 logo
2 file
2 Recording
2 LIBRARY ROUTINES
2 ;"UPPER CASE";
2 ;"Type in file name in ";
2 ;"Stop and rewind tape"
2 ;"STRIKE":
2 ;"SAVE""file"" LINE 2"
2 ;"PLEASE WAIT";
2 ;"Load main program"
2 ;"Line ";i
2 ;"Leave tape running"
2 ;" LOADING PROGRAM
2 ;" ? "
2 ;" "
2 ;" "
2 ;" ":
2 *yc1-(yc+yc1
2 )=" "
2 (n$(z)=" "
2 (i$<"a")))
2 "clear (y/n) ?";q$
2 "address ? ";x
2 "No. of Drives?",dr:
2 "Filename",a$
2 """";z$;""""
2 Q
2 "
1 yc,xc;"Same person?":
1 yc,xc;"Same Person?":
1 yc,xc;"Please ENTER your name":
1 yc,xc;"Please
1 yc,xc;"Do you want instructions?";
1 y(i)=d-s*10
1 y$=y$+z$(j):
1 x(i)=d-s*10
1 v=v+(ind=-1
1 u=u+(ind=1
1 title=8600
1 rem=m+take
1 p$="long mult":
1 p$()=("~usr"+p$)(
1 mult
1 lcurs=8200
1 k$=k$+n$(i)
1 i$="yn"(qn+1
1 div
1 d=(d-y(i))/10
1 d=(d-x(i))/10
1 b$=" "
1 Multiply:-
1 MULT
1 GRAPHICS SEQUENCE
1 G I
1 DIV
1 Created with Ramsoft MakeTZX
1 ;times*d2:
1 ;d2;")";d4
1 ;"two digit number"
1 ;"three digit number";
1 ;"five pins to win"
1 ;"carry out LONG MULTIPLICATION.":
1 ;"answers win"
1 ;"and this leaves "
1 ;"and enter line ";i
1 ;"and ";v;" incorrect"
1 ;"_______";
1 ;"You have ";u;" correct"
1 ;"Which level?:
1 ;"WELL DONE":
1 ;"WE MULTIPLY ";b(4
1 ;"This is an example of how to";
1 ;"TO THE MOON"
1 ;"So far you have ";:
1 ;"SELECT OPTION"
1 ;"Program: Long Mult"
1 ;"Percentage: ";
1 ;"PROGRAM : ""Long Division"""
1 ;"PERCENTAGE : ";
1 ;"OPTIONS";
1 ;"Name: ";N$
1 ;"NOW take away (";times;" x ";d2;") "
1 ;"NAME : ";n$
1 ;"Multiplying:-";
1 ;"More?(Y/N)"
1 ;"More? (Y/N)"
1 ;"Knock down all";
1 ;"KEY in line ";i;" starting at right hand side"
1 ;"It goes once ";
1 ;"It goes ";times;" times ";
1 ;"It goes ";:
1 ;"Instructions?(Y/N)"
1 ;"Incorrect: ";v
1 ;"INCORRECT : ";v
1 ;"How many times does it go?
1 ;"Hello, ";;
1 ;"HELLO ,";k$:
1 ;"GET THE ROCKET";
1 ;"Divide ";m;" by ";d2
1 ;"Correct: ";u
1 ;"CORRECT : ";u
1 ;"Bad luck,check with the computer"
1 ;"3 correct";
1 ;"2.To finish"
1 ;"2. a three digit number by a";
1 ;"1.To Return to main menu";
1 ;"1. a two digit number by a";
1 ;"*** WELL DONE ***"
1 ;"*** CERTIFICATE ***"
1 ;" I'LL BRING DOWN NEXT FIGURE
1 ;" If you answer 'YES' to the following question this program will be erased from memory"
1 ;" If you answer '
1 ;" ":
1 ;" ARE YOU SURE?(Y/N)"
1 ;" ARE YOU SURE (Y/N)"
1 ;" "
1 ;" "
1 ;" ";
1 ;" "
1 ;" "
1 .TO START AGAIN.";
1 .TO FINISH."
1 .TO CONTINUE.";
1 -times*d2:
1 +n;"____";
1 +n;" = Correct Ans "
1 +n-(a>9999
1 +"long div":
1 *(a>999999
1 );"0 under the line as shown."
1 );" by ";q
1 )-(l(i)>999999
1 )-(l(i)>99999
1 )-(l(i)>9999
1 )-(l(i)>999
1 )-(a>999999
1 )-(a>99999
1 'to the following question the program will be erased from memory."
1 "________________________________":
1 "________________________________"
1 "Your answer (wrong) ";y$
1 "The correct answer is: ";
1 "The correct answer is ";a
1 "Remainder: ";d4-d2*
1 "MULTIPLY ";b(4
1 "DIVIDE ";d4;" by ";d2
1 "BOWLING ALLEY":
1 " incorrect."
1 " correct"
1 " ";v;" ";:
1 " ";u;" ";:
1 your name";
1 at end of line"
1 The answer is:
1 Remainder:
1 NO, try again, ";
1 HARD LUCK
1 CERTIFICATE
1 ";d4-d2*
1 K
1 ":
1
1